home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / x2ftp / msdos / mxlibs / dwstk102 / dwt.bi < prev    next >
Text File  |  1995-04-12  |  2KB  |  49 lines
  1. '******************************************************************************
  2. 'File:      dwt.bi
  3. 'Version:   1.02
  4. 'Tab stops: every 2 columns
  5. 'Project:   The Sound ToolKit
  6. 'Copyright: 1994-1995 DiamondWare, Ltd.  All rights reserved.
  7. 'Written:   by Keith Weiner, Erik Lorenzen, and Don Lemons
  8. 'Purpose:   Contains declarations for the DW Timer
  9. 'History:   DL 09/24/94 Ported to .BI
  10. '           EL 11/27/94 Finalized for v1.00
  11. '           EL 04/12/95 Finalized for v1.02
  12. '
  13. 'NOTE: This code is __NOT__ compatible with source profilers
  14. '******************************************************************************
  15.  
  16.  
  17.  
  18. 'Below are the timer rates supported by DWT.  Anything in between
  19. 'the listed values will cause the DOS/BIOS clock to tick erratically
  20. 'and is thus not allowed.  Any value higher than 145.6 Hz means
  21. 'you have some very special circumstances; dwt won't fit your needs
  22. 'anyway.
  23.       
  24. CONST dwt182HZ    = 0 ' 18.2 Hz
  25. CONST dwt364HZ    = 1 ' 36.4 Hz
  26. CONST dwt728HZ    = 2 ' 72.8 Hz
  27. CONST dwt1456HZ = 3 '145.6 Hz
  28.  
  29.  
  30.  
  31. DECLARE SUB          dwtInit                ALIAS "DWT_INIT"             (BYVAL rate%)
  32.  
  33. 'If the program has called dwt_Init, it _MUST_ call dwt_Kill before it
  34. 'terminates.
  35. '
  36. 'NB: Trap critical errors.  Don't let DOS put up the
  37. '    "Abort, Retry, Fail?" text.  ('sides, it'll destroy your pretty gfx)
  38. DECLARE SUB          dwtKill                ALIAS "DWT_KILL"             ()
  39.  
  40.  
  41. 'The following 2 subroutines affect the timer, but not the music
  42. DECLARE SUB          dwtPause             ALIAS "DWT_INIT"             ()
  43.  
  44. DECLARE SUB          dwtUnPause         ALIAS "DWT_KILL"             ()
  45.  
  46.  
  47. 'Number of ticks since Beginning of World
  48. DECLARE FUNCTION dwtMasterTick& ALIAS "DWT_MASTERTICK" ()
  49.